home *** CD-ROM | disk | FTP | other *** search
- object DefinePosForm: TDefinePosForm
- Left = 128
- Top = 125
- Width = 590
- Height = 380
- VertScrollBar.Range = 122
- AutoScroll = False
- Caption = 'Position Action Object'
- Font.Color = clBtnText
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- KeyPreview = True
- Position = poScreenCenter
- Scaled = False
- WindowState = wsMaximized
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 15
- object Panel1: TPanel
- Left = 0
- Top = 308
- Width = 582
- Height = 45
- Align = alBottom
- Alignment = taLeftJustify
- TabOrder = 0
- object Panel2: TPanel
- Left = 312
- Top = 1
- Width = 269
- Height = 43
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 0
- object OkBtn: TBitBtn
- Left = 4
- Top = 8
- Width = 81
- Height = 28
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333300033333333333000B0330000300000E00030BFB70FBFB0
- E0003000000BFBF0E00030BFB70FBFB0E0003000000BFBF0E00030BFB70F0FB0
- E00030000000FBF0E00030BFB700BFB0E0003300000BFB0000003333330FB033
- 33333333330B033333333333330F833333333333333083333333}
- end
- object CancelBtn: TBitBtn
- Left = 92
- Top = 8
- Width = 81
- Height = 28
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333808333
- 33333333330F833333333333330B033330003333330FB03000B03380000BFB00
- E000330FBFBFBFB0E000330087FBFBF0E000330FBFBFBFB0E000330087FBFBF0
- E000330FBFBFBFB0E000330087FBFBF0E000330FBFBFBFB0E000338000000000
- 0000333333333333333333333333333333333333333333333333}
- end
- object HelpBtn: TBitBtn
- Left = 180
- Top = 8
- Width = 81
- Height = 28
- Caption = '&Help'
- TabOrder = 2
- OnClick = HelpBtnClick
- Glyph.Data = {
- 76010000424D760100000000000076000000280000001B000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3300003333333330000033333333333300BFBF00333333300000333333333330
- FBF00BFB03333330000033333333330FBFBFBFBFB0333330000033333333300B
- FBFBFBFBF003333000003333333000BFBFB00FBFBF00033000003333330BF0FB
- FB0BF0FBFB0BF03000003CC330BF80BF000FBF00BF08BF0000003CC330FBF0F0
- FF00F0FF0B0BFB000000333330BF00B0F00FB0F00F00BF0000003CC3330030F0
- 000BF0000B03003000003CCC3333300F00BFBF00B00333300000333CC333330B
- FBF00BFBF03333300000CC3CC3333330BFBF0FBF033333300000CCCCC3333333
- 00FBFB003333333000003CCC3333333333000033333333300000}
- end
- end
- object PosPanel: TPanel
- Left = 1
- Top = 1
- Width = 92
- Height = 43
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 1
- object Label1: TLabel
- Left = 4
- Top = 4
- Width = 24
- Height = 15
- Alignment = taRightJustify
- Caption = 'Left:'
- end
- object Label2: TLabel
- Left = 4
- Top = 22
- Width = 24
- Height = 15
- Alignment = taRightJustify
- Caption = 'Top:'
- end
- object LeftPrompt: TLabel
- Left = 32
- Top = 4
- Width = 7
- Height = 15
- Caption = '0'
- end
- object TopPrompt: TLabel
- Left = 32
- Top = 22
- Width = 7
- Height = 15
- Caption = '0'
- end
- end
- object SizePanel: TPanel
- Left = 93
- Top = 1
- Width = 92
- Height = 43
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 2
- object Label3: TLabel
- Left = 0
- Top = 4
- Width = 39
- Height = 15
- Alignment = taRightJustify
- Caption = 'Width:'
- end
- object WidthPrompt: TLabel
- Left = 43
- Top = 4
- Width = 7
- Height = 15
- Caption = '0'
- end
- object Label4: TLabel
- Left = 0
- Top = 22
- Width = 39
- Height = 15
- Alignment = taRightJustify
- Caption = 'Height:'
- end
- object HeightPrompt: TLabel
- Left = 43
- Top = 22
- Width = 7
- Height = 15
- Caption = '0'
- end
- end
- object Panel4: TPanel
- Left = 333
- Top = 1
- Width = 124
- Height = 43
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 3
- object NeoBookNudgeTool1: TNeoBookNudgeTool
- Left = 0
- Top = 6
- Width = 31
- Height = 31
- OnNudge = NeoBookNudgeTool1Nudge
- end
- object TestBtn: TBitBtn
- Left = 43
- Top = 8
- Width = 81
- Height = 28
- Caption = '&Test'
- Default = True
- TabOrder = 0
- OnClick = TestBtnClick
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777700007777777777777777777700007777777777777777777700007777
- 7777777777777777000077777777777777777777000077777777777000007007
- 000070777777770BFBFB00E700007077777777000FBFB0E700007000077770FB
- FBFBF0E700007099077000000FBFB0E700007099070BFBFBFBFBF0E700007000
- 07700000000FB0E700007077777777770BFB0007000070777777777770007777
- 0000777777777777777777770000777777777777777777770000777777777777
- 7777777700007777777777777777777700007777777777777777777700007777
- 77777777777777770000}
- end
- end
- object SplinePanel: TPanel
- Left = 185
- Top = 1
- Width = 148
- Height = 43
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 4
- object Label5: TLabel
- Left = 4
- Top = 4
- Width = 28
- Height = 15
- Alignment = taRightJustify
- Caption = 'Start:'
- end
- object Label6: TLabel
- Left = 7
- Top = 22
- Width = 25
- Height = 15
- Alignment = taRightJustify
- Caption = 'End:'
- end
- object StartPrompt: TLabel
- Left = 36
- Top = 4
- Width = 7
- Height = 15
- Caption = '0'
- end
- object EndPrompt: TLabel
- Left = 36
- Top = 22
- Width = 7
- Height = 15
- Caption = '0'
- end
- end
- end
- object WorkPanel: TPanel
- Left = 0
- Top = 45
- Width = 582
- Height = 263
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object ScrollBox: TScrollBox
- Left = 0
- Top = 0
- Width = 582
- Height = 263
- HorzScrollBar.Range = 2000
- VertScrollBar.Range = 2000
- Align = alClient
- AutoScroll = False
- BorderStyle = bsNone
- TabOrder = 0
- object E_Image: TNeoBookImage
- Left = 180
- Top = 32
- Width = 12
- Height = 12
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- Visible = False
- end
- object S_Image: TNeoBookImage
- Left = 180
- Top = 12
- Width = 12
- Height = 12
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- Visible = False
- end
- object PageSurface: TNeoBookPaintBox
- Left = 92
- Top = 8
- Width = 73
- Height = 69
- Color = clWhite
- ParentColor = False
- OnPaint = PageSurfacePaint
- end
- object PageFrame: TNeoBookPaintBox
- Left = 12
- Top = 8
- Width = 73
- Height = 69
- Color = clWhite
- ParentColor = False
- OnPaint = PageFramePaint
- end
- object WorkArea: TNeoBookPaintBox
- Left = 0
- Top = 0
- Width = 2000
- Height = 2000
- Align = alClient
- Color = clWhite
- ParentColor = False
- OnMouseDown = WorkAreaMouseDown
- OnMouseMove = WorkAreaMouseMove
- OnMouseUp = WorkAreaMouseUp
- OnPaint = WorkAreaPaint
- end
- end
- end
- object CartoonOpPanel: TPanel
- Left = 0
- Top = 0
- Width = 582
- Height = 45
- Align = alTop
- TabOrder = 2
- Visible = False
- object Label21: TLabel
- Left = 8
- Top = 16
- Width = 39
- Height = 15
- Caption = 'Spee&d:'
- FocusControl = CartoonSpeed
- end
- object Label22: TLabel
- Left = 56
- Top = 28
- Width = 29
- Height = 14
- AutoSize = False
- Caption = 'Fast'
- Font.Color = clBtnText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label23: TLabel
- Left = 232
- Top = 28
- Width = 39
- Height = 14
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Slow'
- Font.Color = clBtnText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label19: TLabel
- Left = 296
- Top = 16
- Width = 43
- Height = 15
- Caption = '&Repeat:'
- FocusControl = CartoonLoopCount
- end
- object Label7: TLabel
- Left = 445
- Top = 16
- Width = 43
- Height = 15
- Caption = 'Time(s)'
- end
- object CartoonSpeed: TTrackBar
- Left = 48
- Top = 4
- Width = 229
- Height = 25
- Ctl3D = True
- Max = 250
- Orientation = trHorizontal
- ParentCtl3D = False
- PageSize = 10
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- TickMarks = tmBottomRight
- TickStyle = tsNone
- OnChange = CartoonSpeedChange
- end
- object CartoonLoopCount: TEdit
- Left = 344
- Top = 12
- Width = 97
- Height = 23
- TabOrder = 1
- Text = '1'
- OnChange = CartoonLoopCountChange
- end
- end
- end
-